proc version {nick host} {
global otbnversion home bcast botadmin organization botnick
  set otbnversion "Running \002X-Bot 2003\002"
  putlog "!$nick ($host)! version"	
  putserv "NOTICE $nick :$otbnversion"
  putserv "NOTICE $nick :This copy is registered to: $organization"
  putserv "NOTICE $nick :Current admin listing is: $botadmin"
  putserv "NOTICE $nick :-"
  putserv "NOTICE $nick :For more information about who made X-Bot, please use (/msg) $botnick credits"
if {$bcast == "1"} {
  putserv "PRIVMSG $home :$nick!$host requested tcl version reply from me."
  }
  }


